Top 10k strings from Graficos - Plot (1984)(ABC Soft)(es)[aka Spectrum Graph Plot].tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   3 h(n),p(n+1
   3 ;"VALOR Y";
   3 ;"VALOR X";
   2 p(n),oy+r*
   2 maxy=miny+g1
   2 g1=maxy-miny:
   2 ;" ANALISIS DE DATOS "
   2 (ux/(maxdx-mindx)/3
   2 (maxdx-mindx)*3
   2 (a(n)*10000
   2 "No. de datos",n
   1 z$="DIBUJO DE GRAFICOS"
   1 ym=miny/10
   1 y$="y="+y$
   1 y$="TOTAL POR MES"
   1 x$="meses4"
   1 x$="meses1"
   1 x$="E F M A M J J A S O N D "
   1 tty=tty+y:
   1 tty=tty+a(n)
   1 tty=tty+a(2
   1 ttx=ttx+a(1
   1 sy=uy/(maxy-miny)
   1 sx=ux/(maxx-minx)
   1 my=maxy/10
   1 miny=mind:
   1 minx=mindx:
   1 minx=mindx-1
   1 mindx=99999999
   1 mind=mindx:
   1 maxx=minx+g1
   1 maxx=maxdx:
   1 maxdx=-mindx:
   1 maxd=maxdx:
   1 k1=k1+a(n):
   1 k$="X "+k$:
   1 k$="ACUMULATIVO":
   1 g1=maxx-minx
   1 error noise 
   1 e$(n)=k$(1
   1 VERTICAL TEXT
   1 POT       
   1 PLOT      A
   1 ORIGINAL TAPE (NOT D.L.)
   1 LINE&POINT
   1 HISTOGRAMA 
   1 GEM07 - GRAFICOS / PLOT  
   1 FINANCIAL AXIS
   1 DIBUJO DE GRAFICOSj
   1 D Swain. Hillrise Software
   1 ;"Valor X","Valor Y"
   1 ;"Tel (91) 2488213"
   1 ;"SALVO DATOS EN CINTA"
   1 ;"Reproducion Prohibida";
   1 ;"Representante_exclusivo";
   1 ;"Ponga la cinta y pulse Play":
   1 ;"Para Espana";
   1 ;"POR FAVOR SEA PACIENTE!"
   1 ;"PONGA CINTA Y PULSE PLAY"
   1 ;"PARE LA CINTA":
   1 ;"PARE LA CINTA"
   1 ;"PARA ALTERAR PRESENTACION"
   1 ;"ORIGEN      ";
   1 ;"INICIO EJES ";
   1 ;"FIN EJES    ";
   1 ;"Dato","Valor"
   1 ;"CARGANDO EL PROGRAMA .. ESPERE"
   1 ;"CAMBIO VALORES":
   1 ;"ABC Analog";
   1 ;"7. Fin cambios "
   1 ;"7. FIN                  "
   1 ;"6. Origen X    ";
   1 ;"6. FUNCION              "
   1 ;"5. eje X Max.  ";
   1 ;"5. GRAFICO X,Y DE LINEAS"
   1 ;"4. eje X Min.  ";
   1 ;"4. GRAFICO X,Y DE PUNTOS"
   1 ;"3. Origen Y    ";
   1 ;"3. GRAFICO DE TARTA     "
   1 ;"2. eje Y Max.  ";
   1 ;"2. GRAFICO DE LINEAS    "
   1 ;"1. eje Y Min.  ";
   1 ;"1. HISTOGRAMA           "
   1 ;" LA CINTA          ":
   1 ;" INTERVALO  ";
   1 ;" ESCALA "
   1 ;" ESCALA     ";
   1 ;" ANALISIS DE GRAFICA "
   1 1 DIM LINE GRAPH
   1 +(oy+(r-16
   1 +(ox+(r-16
   1 *(maxdx-mindx)/ux
   1 )=(p(n)+p(n-1
   1 )*(my-ym)/5
   1 (1000.0001
   1 ((y-miny)*sy+0.5
   1 ((x-minx)*sx+.5
   1 "press enter ";k$
   1 "nombre de la matriz? ";k$
   1 "Verifico s/n? ";g$
   1 "Valor? ";a(n)
   1 "Valor minimo de x =";mindx
   1 "Valor maximo de x =";maxdx
   1 "Valor Y = ";a(2
   1 "Valor X = ";a(1
   1 "Uso datos anteriores? ";s$
   1 "Titulo eje Y ";y$
   1 "Titulo eje X ";x$
   1 "Titulo del grafico? ";t$
   1 "Seleccione 1-7 ";k
   1 "Seleccione 1-7 ";c
   1 "Salvo datos en cinta? ";k$
   1 "Resalto dato "+
   1 "Pulse ENTER para seguir";k$
   1 "Pulse ENTER para menu ";y$
   1 "Pulse ENTER ";k$
   1 "Por favor complete la funcion     y=";y$
   1 "Numero de datos ";q,,,"Por favor seleccione el rango"
   1 "Nuevo valor ";v
   1 "Nombre del fichero ";k$
   1 "Imprimo Datos ? ";k$
   1 "Esta bien? ";k$
   1 "Datos en cinta? ";r$
   1 "Dato inicial ";j
   1 "Dato final ";i
   1 "Cuantos datos? ";k
   1 "Copio Pantalla a Impresora? ";k$
   1 "Acumulativo s/n? ";k$
   1  GEMINI MARKETING LTD. / ABC SOFT
   1   1982 Gemini Marketing Ltd"